home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cream of the Crop 21
/
Cream of the Crop 21 (Terry Blount) (October 1996).iso
/
program
/
lxtw109.zip
/
SXTNVIEW.FRM
< prev
next >
Wrap
Text File
|
1996-08-03
|
34KB
|
819 lines
VERSION 4.00
Begin VB.Form Form1
Appearance = 0 'Flat
BackColor = &H00FFFF00&
BorderStyle = 1 'Fixed Single
Caption = "SXTN Viewer (v1.09) - Copyright ⌐ 1994-1996 by J.M."
ClientHeight = 6420
ClientLeft = 1065
ClientTop = 1500
ClientWidth = 7080
ClipControls = 0 'False
BeginProperty Font
name = "MS Sans Serif"
charset = 1
weight = 700
size = 8.25
underline = 0 'False
italic = 0 'False
strikethrough = 0 'False
EndProperty
ForeColor = &H80000008&
Height = 6825
Icon = "SXTNVIEW.frx":0000
Left = 1005
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 6420
ScaleWidth = 7080
Top = 1155
Width = 7200
Begin VB.CommandButton Command7
Appearance = 0 'Flat
BackColor = &H80000005&
Caption = "Sto&p Action"
Height = 375
Left = 5160
TabIndex = 28
Top = 1815
Width = 1815
End
Begin VB.CommandButton Command6
Appearance = 0 'Flat
BackColor = &H80000005&
Caption = "Get &Called Items"
Height = 375
Left = 5160
TabIndex = 27
Top = 2760
Width = 1815
End
Begin VB.CommandButton Command5
Appearance = 0 'Flat
BackColor = &H80000005&
Caption = "Get &Defined Items"
Height = 375
Left = 5160
TabIndex = 25
Top = 3720
Width = 1815
End
Begin VB.OptionButton Option5
Appearance = 0 'Flat
BackColor = &H00FFFF00&
Caption = "LFT"
ForeColor = &H80000008&
Height = 255
Left = 4200
TabIndex = 24
Top = 120
Width = 735
End
Begin VB.OptionButton Option4
Appearance = 0 'Flat
BackColor = &H00FFFF00&
Caption = "FFT"
ForeColor = &H80000008&
Height = 255
Left = 3480
TabIndex = 19
Top = 120
Width = 735
End
Begin VB.OptionButton Option3
Appearance = 0 'Flat
BackColor = &H00FFFF00&
Caption = "DFT"
ForeColor = &H80000008&
Height = 255
Left = 2760
TabIndex = 18
Top = 120
Width = 735
End
Begin VB.OptionButton Option2
Appearance = 0 'Flat
BackColor = &H00FFFF00&
Caption = "CST"
ForeColor = &H80000008&
Height = 255
Left = 2040
TabIndex = 17
Top = 120
Width = 735
End
Begin VB.OptionButton Option1
Appearance = 0 'Flat
BackColor = &H00FFFF00&
Caption = "CFT"
ForeColor = &H80000008&
Height = 255
Left = 1320
TabIndex = 0
Top = 120
Width = 735
End
Begin VB.CommandButton Command4
Appearance = 0 'Flat
BackColor = &H80000005&
Caption = "Get &All Items"
Height = 375
Left = 5160
TabIndex = 14
Top = 3240
Width = 1815
End
Begin VB.CommandButton Command3
Appearance = 0 'Flat
BackColor = &H80000005&
Caption = "Get &Files"
Height = 375
Left = 5160
TabIndex = 16
Top = 4920
Width = 1815
End
Begin VB.ListBox List2
Appearance = 0 'Flat
Height = 1395
Left = 120
TabIndex = 12
Top = 4920
Width = 4935
End
Begin VB.ListBox List1
Appearance = 0 'Flat
Height = 1395
Left = 120
TabIndex = 10
Top = 3240
Width = 4935
End
Begin VB.CommandButton Command2
Appearance = 0 'Flat
BackColor = &H80000005&
Caption = "&Search item"
Height = 375
Left = 5160
TabIndex = 9
Top = 2295
Width = 1815
End
Begin VB.TextBox Text1
Appearance = 0 'Flat
Height = 285
Left = 1200
TabIndex = 7
Top = 2280
Width = 3855
End
Begin VB.CommandButton Command1
Appearance = 0 'Flat
BackColor = &H80000005&
Caption = "E&xit"
Height = 500
Left = 5175
TabIndex = 4
Top = 105
Width = 1815
End
Begin VB.FileListBox File1
Appearance = 0 'Flat
Height = 1395
Left = 120
Pattern = "*.dbf"
TabIndex = 2
Top = 720
Width = 2175
End
Begin VB.DirListBox Dir1
Appearance = 0 'Flat
Height = 1155
Left = 2400
TabIndex = 1
Top = 1080
Width = 2655
End
Begin VB.DriveListBox Drive1
Appearance = 0 'Flat
Height = 315
Left = 2400
TabIndex = 20
Top = 720
Width = 2655
End
Begin VB.Label Label11
Appearance = 0 'Flat
BackColor = &H80000005&
BackStyle = 0 'Transparent
Caption = "Select database from file dialog"
ForeColor = &H80000008&
Height = 495
Left = 5190
TabIndex = 26
Top = 735
Width = 1455
End
Begin VB.Label Label10
Appearance = 0 'Flat
BackColor = &H80000005&
BackStyle = 0 'Transparent
Caption = "Double click on file to show file contents"
ForeColor = &H80000008&
Height = 495
Left = 5160
TabIndex = 23
Top = 5400
Width = 1815
End
Begin VB.Label Label9
Appearance = 0 'Flat
BackColor = &H80000005&
BackStyle = 0 'Transparent
Caption = "Double click on item to get location"
ForeColor = &H80000008&
Height = 495
Left = 5160
TabIndex = 22
Top = 4200
Width = 1815
End
Begin VB.Label Label8
Appearance = 0 'Flat
BackColor = &H00FFFF00&
BackStyle = 0 'Transparent
Caption = "SXTN-Type"
ForeColor = &H80000008&
Height = 255
Left = 120
TabIndex = 21
Top = 120
Width = 1095
End
Begin VB.Label Label7
Appearance = 0 'Flat
BackColor = &H80000005&
BorderStyle = 1 'Fixed Single
ForeColor